﻿<!--#include file="../Lib/base.asp"-->
<%call islogin%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<link href="../css/public.Css" rel="stylesheet" type="text/css" />
<link href="../css/left.Css" rel="stylesheet" type="text/css" />
<script language="javascript" src="../js/jquery.js"></script>
<script language="javascript" src="../js/jquery.artDialog.js?skin=default"></script>
<script language="javascript" src="../js/artDialog.iframeTools.js"></script>
<script language="javascript" src="../js/admin.js"></script>
<script>
$(function(){
	$("#left dt:first-child").click();
	var url=$("#left dt:first-child a").attr("href");
	if(url==null){url="about:blank"}
	parent.mainFrame.location=url;
	$(".out").click(function(){
		var throughBox=$.dialog.through;
		throughBox({
				icon:'question',
				content:'确定要退出登录？',
				lock:true,
				opacity:'0.5',
				ok:function(){parent.location.href="login.asp?act=out";},
				cancelVal:'取消',
				cancel:true 
			});
		})			
})
</script>
<base target="mainFrame" />
</head>
<body>
    <div id="left">
        <dl><%if request("act")="set" then%>
            <dt onClick="DoLocation(this)"><a href="set.asp">○ 基本配置</a></dt>
            <dt onClick="DoLocation(this)"><a href="set2.asp">○ 高级配置</a></dt>
            <dt onClick="DoLocation(this)"><a href="KeyWord.asp?act=edit&key=关注回复">○ 关注回复设置</a></dt>
            <%elseif request("act")="menu" then%>
            <dt onClick="DoLocation(this)"><a href="Menu.asp">○ 自定义菜单设置</a></dt>
            <dt onClick="DoLocation(this)"><a href="Menu.asp?act=add">○ 添加自定义菜单</a></dt>
            <%elseif request("act")="msg" then%>
            <dt onClick="DoLocation(this)"><a href="Msg.asp">○ 消息管理</a></dt>
            <%elseif request("act")="user" then%>
            <dt onClick="DoLocation(this)"><a href="User.asp">○ 粉丝管理</a></dt>
            <dt onClick="DoLocation(this)"><a href="User_Location.asp">○ 实时位置管理</a></dt>
            <%elseif request("act")="keyword" then%>
            <dt onClick="DoLocation(this)"><a href="KeyWord.asp">○ 关键字设置</a></dt>
            <dt onClick="DoLocation(this)"><a href="KeyWord.asp?act=add">○ 添加关键字</a></dt>
            <dt onClick="DoLocation(this)"><a href="KeyWord_Class.asp">○ 关键字分类</a></dt>
            <%elseif request("act")="picmsg" then%>
            <%dim datadb:datadb=Cls.db.dbload("","p_Title,p_Admin_Url","[Plug]","p_Type=1","p_num asc")
			if ubound(datadb)>=0 then
				for i=0 to ubound(datadb,2)%>
            <dt onClick="DoLocation(this)"><a href="../<%=datadb(1,i)%>">○ <%=datadb(0,i)%></a></dt>
				<%next
			else%>
            <dt onClick="DoLocation(this)"><a href="Plug.asp">○ 请安装插件</a></dt>
            <%end if%>
            <%elseif request("act")="help" then%>
            <dt onClick="DoLocation(this)"><a href="help.asp">○ 教程说明</a></dt>
            <%elseif request("act")="index" then%>
            <dt onClick="DoLocation(this)"><a href="right.asp">○ 管理首页</a></dt>
            <dt onClick="DoLocation(this)"><a href="edit.asp">○ 修改密码</a></dt>
            <dt onClick="DoLocation(this)"><a href="help.asp">○ 教程说明</a></dt>
            <dt><a href="javascript:;" class="out">○ 退出登录</a></dt>
            <%elseif request("act")="plug" then%>
            <dt onClick="DoLocation(this)"><a href="Plug.asp">○ 插件管理</a></dt>
            <%datadb=Cls.db.dbload("","p_Title,p_Admin_Url","[Plug]","","p_num asc")
			if ubound(datadb)>=0 then
				for i=0 to ubound(datadb,2)%>
            <dt onClick="DoLocation(this)"><a href="../<%=datadb(1,i)%>">○ <%=datadb(0,i)%></a></dt>
				<%next
			end if%>
            <%end if%>
        </dl>
    </div>
</body>
</html>
